home *** CD-ROM | disk | FTP | other *** search
/ Aminet 30 / Aminet 30 (1999)(Schatztruhe)[!][Apr 1999].iso / Aminet / game / role / HammyTown.lha / 23.room < prev    next >
Text File  |  1997-10-18  |  2KB  |  71 lines

  1. /*
  2. /* Room script for GRAAL
  3. /*
  4. /* "Room" 23 - MOD bit! - Killer Hamster!
  5. /* RF 1=0 First visit
  6. /* RF 2=0 Hamster present, RF 2=1 Hamster not present.
  7.  
  8. /* UPDATE: scroll_frames[;normal_frames]
  9. /*
  10. UPDATE: 2;1
  11.  
  12. /* SECTION: section_no
  13. /*
  14. SECTION: 1
  15.  
  16. /* BG_IFF: file
  17. /*
  18. BG_IFF: 17BG.iff
  19.  
  20. /* START_POS: startpos_no;image;x;y;L|M|R;floor_no
  21. /*
  22. START_POS: 1;14;5;96;L;1
  23. START_POS: 2;11;624;105;R;1
  24.  
  25. /* FLOOR: floor_no;x1;y1;x2;y2;floormaps
  26. /*
  27. FLOOR: 1;0;57;639;119;1-1
  28.  
  29. /* PATH: path_no;floor1;floor2;px1;py1;px2;py2;{more_points} (This statement is optional)
  30.  
  31. /* EXIT: exit_no;x1;y1;x2;y2;x;y;description (This statement is optional)
  32. EXIT: 1;0;46;36;119;7;99;Path
  33. EXIT: 2;609;54;639;119;627;109;Exit
  34.  
  35. /* CLPART: file (This statement is optional)
  36. CLPART: 17FG.iff
  37.  
  38. /* ROOMBOBS: number;start_bob;x1;y1;w;h;x-offset;hotspot (This statement is optional)
  39. /* 1 is hamster. That's all.
  40. ROOMBOBS: 1;1;147;147;62;50;27; 
  41.  
  42. /* STATIC: bob;image;x;y (This statement is optional)
  43.  
  44. /* ANIM: bob;image;anim_ch;anim;x;y (This statement is optional)
  45.  
  46. /* ROOMOBJ: obj;name;room;VIS|NVIS;bob;image;x;y;cx;cy;cimage;prep;PICK|NPICK;anim_ch;verb;icon;LOW|MID|HIGH;types;w1;w2;w3 (This statement is optional)
  47. ROOMOBJ: 1;Killer Hamster;23;VIS;55;RBOB1;236;102;-7;2;14; ;NPICK; ;8; ;MID;AV;a;this ;him
  48.  
  49. /* DACT: {cond|comm}
  50. /*
  51. DACT: LIGHTS ON
  52. DACT: IFRF 2=1;EXIT
  53.  
  54. DACT: IFRF 1=0;SAY Yikes!;SAY What a nasty looking creature!;SAY This must be the Killer Hamster I was told about;SETRF 1=1
  55.  
  56. DACT: IFNOTCARR 31;SAY He looks hungry.;SAY I'm not going to get past him without some means of calming him down.;GOTO 17,2;EXIT
  57. DACT: IFOF 31,1=0;SAY I could use these sunflower seeds, they would cheer him up.;SAY But there are not enough here to feed this giant hamster!;GOTO 17,2;EXIT
  58. DACT: SAY Now I've got loads of sunflower seeds!;SAY Hey, hammy!;MOBJ ROBJ1;HANDLE ROBJ1;W 50;HANDLE -1;REMOVE 31,U,0;SAY That's stuffed him up a bit.
  59. DACT: SAY I should be able to get past him now.;SETRF 2=1;EXIT
  60.  
  61. /* LINE: dlg;line_no;sentence1;sentence2| ;{cond} (This statement is optional)
  62.  
  63. /* LACT: dlg;line_no;{cond|comm} (This statement is optional)
  64.  
  65. /* ACTION: verb_no;{cond|comm} (This statement is optional)
  66.  
  67. ACTION: 0;IFOBJ 1;MEXIT;GOTO 17,2
  68. ACTION: 0;IFOBJ 2;MEXIT;GOTO 24,1
  69.  
  70. ACTION: 8;IFOBJ ROBJ1;SAY Aww, he's just a big cute furry killer hamster!;EXIT
  71.